object frmAddUser: TfrmAddUser
  Left = 0
  Top = 0
  Caption = #28155#21152#29992#25143
  ClientHeight = 362
  ClientWidth = 586
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object rzpnlBotton: TRzPanel
    Left = 0
    Top = 321
    Width = 586
    Height = 41
    Align = alBottom
    TabOrder = 0
    object btnAdd: TButton
      Left = 416
      Top = 6
      Width = 75
      Height = 25
      Caption = #28155#21152
      TabOrder = 0
      OnClick = btnAddClick
    end
    object btnCancel: TButton
      Left = 497
      Top = 6
      Width = 75
      Height = 25
      Caption = #21462#28040
      TabOrder = 1
      OnClick = btnCancelClick
    end
  end
  object rzpnlMain: TRzPanel
    Left = 0
    Top = 0
    Width = 586
    Height = 321
    Align = alClient
    TabOrder = 1
    object dbgdAddPbUser: TDBGridEh
      Left = 2
      Top = 2
      Width = 382
      Height = 317
      Align = alClient
      DataGrouping.GroupLevels = <>
      DataSource = dsPbUser
      Flat = False
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'Tahoma'
      FooterFont.Style = []
      IndicatorOptions = [gioShowRowIndicatorEh]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = 'sel'
          Footers = <>
          Title.Caption = #36873#25321#29992#25143
          Width = 53
        end
        item
          EditButtons = <>
          FieldName = 'usernm'
          Footers = <>
          ReadOnly = True
          Title.Caption = #29992#25143#21517
          Width = 78
        end
        item
          EditButtons = <>
          FieldName = 'staffid'
          Footers = <>
          ReadOnly = True
          Title.Caption = #21592#24037'ID'
          Width = 72
        end
        item
          EditButtons = <>
          FieldName = 'email'
          Footers = <>
          ReadOnly = True
          Title.Caption = 'Email'
          Width = 155
        end>
      object RowDetailData: TRowDetailPanelControlEh
      end
    end
    object dbgdRole: TDBGridEh
      Left = 384
      Top = 2
      Width = 200
      Height = 317
      Align = alRight
      DataGrouping.GroupLevels = <>
      DataSource = dsRole
      Flat = False
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'Tahoma'
      FooterFont.Style = []
      IndicatorOptions = [gioShowRowIndicatorEh]
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = 'sel'
          Footers = <>
          Title.Caption = #36873#25321
        end
        item
          EditButtons = <>
          FieldName = 'id'
          Footers = <>
          ReadOnly = True
          Title.Caption = 'ID'
          Width = 37
        end
        item
          EditButtons = <>
          FieldName = 'name'
          Footers = <>
          ReadOnly = True
          Title.Caption = #35282#33394
        end>
      object RowDetailData: TRowDetailPanelControlEh
      end
    end
  end
  object myqryPbUser: TMyQuery
    Connection = DMMySQL.conMySQL
    SQL.Strings = (
      
        'select * from psdb.hr_pbuser where usernm not in (select userNam' +
        'e from sys_user)')
    Left = 96
    Top = 168
    object myqryPbUserusernm: TWideStringField
      FieldName = 'usernm'
      Origin = 'hr_pbuser.usernm'
      Size = 30
    end
    object myqryPbUserpasswd: TWideStringField
      FieldName = 'passwd'
      Origin = 'hr_pbuser.passwd'
      Size = 80
    end
    object myqryPbUserstaffid: TWideStringField
      FieldName = 'staffid'
      Origin = 'hr_pbuser.staffid'
    end
    object myqryPbUsersuperid: TWideStringField
      FieldName = 'superid'
      Origin = 'hr_pbuser.superid'
    end
    object myqryPbUseremail: TWideStringField
      FieldName = 'email'
      Origin = 'hr_pbuser.email'
      Size = 60
    end
    object myqryPbUsermanager: TWideStringField
      FieldName = 'manager'
      Origin = 'hr_pbuser.manager'
      FixedChar = True
      Size = 1
    end
    object myqryPbUserhr: TWideStringField
      FieldName = 'hr'
      Origin = 'hr_pbuser.hr'
      FixedChar = True
      Size = 1
    end
    object myqryPbUserareaid: TWideStringField
      FieldName = 'areaid'
      Origin = 'hr_pbuser.areaid'
      Size = 10
    end
    object myqryPbUserstoreid: TWideStringField
      FieldName = 'storeid'
      Origin = 'hr_pbuser.storeid'
      Size = 10
    end
    object myqryPbUserdeptid: TWideStringField
      FieldName = 'deptid'
      Origin = 'hr_pbuser.deptid'
      Size = 10
    end
    object myqryPbUsermail2: TWideStringField
      FieldName = 'mail2'
      Origin = 'hr_pbuser.mail2'
    end
    object myqryPbUserpwd_md5: TWideStringField
      FieldName = 'pwd_md5'
      Origin = 'hr_pbuser.pwd_md5'
      Size = 100
    end
    object myqryPbUserUpdateTime: TDateTimeField
      FieldName = 'UpdateTime'
      Origin = 'hr_pbuser.UpdateTime'
    end
  end
  object dsPbUser: TDataSource
    DataSet = cdsPbUserAdd
    Left = 136
    Top = 240
  end
  object dsPrdPBUserAdd: TDataSetProvider
    DataSet = myqryPbUser
    Left = 96
    Top = 208
  end
  object cdsPbUserAdd: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsPrdPBUserAdd'
    Left = 96
    Top = 240
    object cdsPbUserAddusernm: TWideStringField
      FieldName = 'usernm'
      Size = 30
    end
    object cdsPbUserAddpasswd: TWideStringField
      FieldName = 'passwd'
      Size = 80
    end
    object cdsPbUserAddstaffid: TWideStringField
      FieldName = 'staffid'
    end
    object cdsPbUserAddsuperid: TWideStringField
      FieldName = 'superid'
    end
    object cdsPbUserAddemail: TWideStringField
      FieldName = 'email'
      Size = 60
    end
    object cdsPbUserAddmanager: TWideStringField
      FieldName = 'manager'
      FixedChar = True
      Size = 1
    end
    object cdsPbUserAddhr: TWideStringField
      FieldName = 'hr'
      FixedChar = True
      Size = 1
    end
    object cdsPbUserAddareaid: TWideStringField
      FieldName = 'areaid'
      Size = 10
    end
    object cdsPbUserAddstoreid: TWideStringField
      FieldName = 'storeid'
      Size = 10
    end
    object cdsPbUserAdddeptid: TWideStringField
      FieldName = 'deptid'
      Size = 10
    end
    object cdsPbUserAddmail2: TWideStringField
      FieldName = 'mail2'
    end
    object cdsPbUserAddpwd_md5: TWideStringField
      FieldName = 'pwd_md5'
      Size = 100
    end
    object cdsPbUserAddUpdateTime: TDateTimeField
      FieldName = 'UpdateTime'
    end
    object cdsPbUserAddsel: TBooleanField
      FieldKind = fkInternalCalc
      FieldName = 'sel'
    end
  end
  object dsRole: TDataSource
    DataSet = cdsRole
    Left = 512
    Top = 128
  end
  object cdsRole: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsPrdRole'
    Left = 480
    Top = 128
    object cdsRoleid: TIntegerField
      FieldName = 'id'
    end
    object cdsRolename: TWideStringField
      FieldName = 'name'
      Size = 50
    end
    object cdsRolesel: TBooleanField
      FieldKind = fkInternalCalc
      FieldName = 'sel'
    end
  end
  object dsPrdRole: TDataSetProvider
    DataSet = myqryRole
    Left = 480
    Top = 104
  end
  object myqryRole: TMyQuery
    Connection = DMMySQL.conMySQL
    SQL.Strings = (
      'select * from sys_role where id<>1')
    Left = 480
    Top = 72
  end
end
